﻿Namespace bl.bo
    Public Class BOBrokenRule
        Private _descripcion As String

        Private Sub New()

        End Sub
        Public Sub New(ByVal id As Integer, ByVal descripcion As String)
            _descripcion = descripcion
        End Sub

        Public ReadOnly Property descripcion As String
            Get
                Return _descripcion
            End Get
        End Property

    End Class
End Namespace